home *** CD-ROM | disk | FTP | other *** search
/ Power Programmierung / Power-Programmierung (Tewi)(1994).iso / fortran / mslang / mouse_32 / readme.txt < prev   
Text File  |  1993-07-06  |  2KB  |  75 lines
  1. This software is distributed as is.
  2.  
  3. THIS IS A BETA VERSION OF THIS APPLICATION NOTE, please give us your
  4. suggestions and opinions.
  5.  
  6.  
  7. The following disk contains sample code to access the mouse from the
  8. PowerStation. It is based on the example in \SAMPLES\GRAPHICS\DEMO,
  9. but has many corrections and some extensions.  The disk contains the
  10. following files:
  11.  
  12.  
  13.     README.TXT
  14.     MOUSE.ASM       !Functions to access the mouse
  15.     MOUSE.OBJ       !Assembled version of MOUSE.ASM
  16.     MOUSE.FI        !Prototypes for the mouse functions
  17.     MOUSE.FD        !Data declarations for the functions
  18.     M_TEST.FOR      !Fortran program demonstrating the functions
  19.  
  20.     LEGAL.TXT       Description of rights and responsibilities
  21.  
  22. Some additional information:
  23.  
  24. These are the new mouse functions:
  25.     GetButtonPress   !Number of times a button was pressed, and
  26.                      !the position of the last press
  27.     GetButtonRelease !Number of times a button was released, and
  28.                      !the position of the last release
  29.  
  30.  
  31. The following functions are provided for using the mouse:
  32.  
  33.  
  34.       INTEGER FUNCTION MouseInit()
  35.    Explicitly calling the initialization function is not required
  36.    since it will automatically be called the first time one of the
  37.    following functions is executed.
  38.  
  39.  
  40.       LOGICAL FUNCTION GetMouseEvent(Event)
  41.    Check for differences in the mouse state
  42.  
  43.       SUBROUTINE GetPtrPos(Event)
  44.    Get the current position and state of mouse cursor
  45.  
  46.       SUBROUTINE SetPtrPos(x, y)
  47.    Set the current position of mouse cursor
  48.  
  49.       INTEGER FUNCTION GetButtonPress(Btn_sts)
  50.    Get the number of times a button was pressed, and the position of
  51.    the last press
  52.  
  53.       INTEGER FUNCTION GetButtonRelease(Btn_sts)
  54.    Get the number of times a button was released, and the position of
  55.    the last release
  56.  
  57.       SUBROUTINE SetPtrVis(iPV)
  58.    Set cursor visibility
  59.  
  60.  
  61. The following function was removed since the interupt it is based on
  62. was not implemented:
  63.     SetPtrShape
  64.  
  65.  
  66. To create the example:
  67.     FL32  M_TEST.FOR  MOUSE.OBJ
  68.  
  69. For more information see the FORTRAN example source code M_TEST.FOR,
  70. and the mouse source and header files MOUSE.ASM, MOUSE.FI, and
  71. MOUSE.FD.
  72.  
  73.  
  74. *** Issues ***
  75.  getptrpos may not work in text mode